home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue45 / Cookies / WEBSERV.DPR < prev   
Encoding:
Text File  |  2000-11-02  |  326 b   |  16 lines
  1. program WebServ;
  2. uses
  3.   DrBobCGI, SysUtils;
  4. begin
  5.   writeln('content-type: text/html');
  6.   writeln('Set-Cookie: Name=Bob; path=/');
  7.   writeln;
  8.   writeln('<HTML>');
  9.   writeln('<BODY>');
  10.   writeln('<H1>Cookies</H1>');
  11.   writeln('<HR>');
  12.   writeln(CookieValue(''));
  13.   writeln('</BODY>');
  14.   writeln('</HTML>');
  15. end.
  16.